Top 10k strings from Biorritmos (19xx)(-)(es)[different].tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   2 )-((af-1900
   1 x$(bi)="I":
   1 x$(bf)="F":
   1 x$(be)="E":
   1 d=d+df-di:
   1 biorritmos
   1 MAY 6  FI          |            \
   1 ENEFEBMARABRMAYJUNJULAGOSEPOCTNOVDIC
   1 )-((ai-1900
   1 ((n+d)*ci)+20.5
   1 ((n+d)*cf)+20.5
   1 ((n+d)*ce)+20.5
   1 "Transcurridos ";d;" dias"'"--------------------------------"
   1 "Nombre: ";n$
   1 "NACIMIENTO"'"Ano=";ai;";Mes(1-12)=";mi;";Dia=";di
   1 "Los datos son correctos ? ";y$:
   1 "Fecha de comienzo del calculo   Ano=";af;";Mes=";mf;";Dia=";df
   1 "F=ciclo fisico; duracion 23 diasE=  ""    emoc.;    ""     28   "" I=  ""   intel.;    ""     31   """
   1 "Cuantos dias calculo ? ";b
   1 "Biorritmo de "'n$''"Fecha de nacimiento:"'di;" de ";m$(mi);" de ";ai''"A partir del ";df;" de ";m$(mf);" de ";af
   1 "--------------------------------";
   1           BIORRITMOS    
   1              FIN  
   1